Plot[{Sin[x],Cos[x]},{x,-1,1}]
Plot[Sin[x],{x,-100,100}]
Plot[Sin[x],{x,-1,1},Options[PlotRange->{-0.5,0.5}]]
Plot[{Sin[x],Cos[x]},{x,-1,1}]
Plot[x,{x,0,1}]
Plot[{Sin[x],Cos[x]},{x,-1,1},Options[ColorFunction[Cos[x]]]]
Plot[{Sin[x],Cos[x]},{x,-10,10},Options[ColorFunction[Cos[x]],PlotRange->{-0.5,0.5}]]
Plot[{Sin[x]+1/2*x,Sin[x]+x},{x,0,10},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],x},{x,0,10},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],Cos[x]},{x,-5,5},Options[FillToCurve->{0,1}]]
Plot[2*Sin[x]+x,{x,0,15},Options[FillToAxes->{0}]]
Plot[Sin[x],{x,0,15},Options[FillToAxes->{0}]]
Plot[{Sin[x],Cos[x]},{x,-10,10},Options[ColorFunction[Cos[x]],FillToAxes->{0},PlotRange->{-0.5,0.5}]]
Plot[{Sin[x],Sin[x]+1/x},{x,-4,7},Options[ColorFunction[Cos[x]],PlotRange->{-5,5}]]
Plot[Sin[x],{x,-1,1},Options[Axes->{True,False}]]
Plot[Sin[x],{x,-1,1},Options[AxesLabel->{x,Sinc[x]}]]
Plot[{Sin[x],Cos[x]},{x,1,3},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],x},{x,1,3},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],1/x},{x,-1,3},Options[ColorFunction[Cos[x]],PlotRange->Auto]]
Plot[{Sin[x],1/x},{x,-1,3},Options[PlotRange->Auto]]
Plot[{Sin[x],1/(2*x)+1},{x,-1,3},Options[PlotRange->Auto]]
Plot[{Sin[x],1/x},{x,0,3},Options[PlotRange->Auto]]
Plot[{Sin[x],1/x},{x,-1,0},Options[PlotRange->Auto]]
Plot[{Sin[x],1/x},{x,-1,3},Options[FillToCurve->{0,1}]]
Plot[Tan[x],{x,-5,5},Options[ColorFunction[Cos[x]],PlotRange->{-0.5,0.5}]]
Plot[{Sin[x],Tan[x]},{x,-1,3},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],Cos[2*x],2*x},{x,-5,5},Options[FillToCurve->{0,2}]]
Plot[{Sin[x],3*x,-2*x},{x,-5,5},Options[FillToCurve->{1,2},PlotRange->{-3,3}]]
Plot[ArcSin[x],{x,-5,5},Options[ColorFunction[Cos[x]],PlotRange->{-0.5,0.5}]]
Plot[ArcSin[x],{x,-5,5}]
Plot[ArcSin[x],{x,-1,1}]
Plot[Log[x],{x,-1,1}]
Plot[{Sin[x],Log[x]},{x,-10.1,10.1},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],Log[x]},{x,-10.1,10.1}]
Plot[Tan[x],{x,-10,10}]
Plot[Tan[x],{x,-5,5},Options[ColorFunction[Tan[x]],PlotRange->{-0.5,0.5}]]
Plot[{Tan[x],Cot[x]},{x,-3,3},Options[FillToCurve->{0,1},PlotRange->{-1,1}]]
Plot[{Sin[x],Cos[2*x],2*x},{x,0,5},Options[ColorFunction[1/x]]]
Plot[{Sin[x],Cos[2*x],2*x},{x,-5,5},Options[ColorFunction[Tan[x]]]]
Plot[{Sin[x],Cos[2*x],2*x},{x,-5,5},Options[ColorFunction[Cos[x]]]]
Plot[{Sin[x],Cot[x]},{x,-1,3},Options[FillToCurve->{0,1}]]
Plot[{x,Cot[x]},{x,-10,10},Options[FillToCurve->{0,1},PlotRange->{-10,10}]]
Plot[{x,Cot[x]},{x,-100,100},Options[FillToCurve->{0,1}]]
Plot[{x,Cot[x]},{x,-100,100}]
Plot[{x,Cot[x]},{x,-100,100},Options[FillToCurve->{0,1}]]
Plot[{x,Cot[x]},{x,-10,10},Options[FillToCurve->{0,1}]]
Plot[{x,Cot[x]},{x,-10,10},Options[PlotRange->{-5,5}]]
Plot[{x,Cot[x]},{x,-20,20}]
Plot[1/Sin[x],{x,-3,3}]
Plot[{Sin[x],1/Sin[x]},{x,-5,5},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],(3*x-1)/(x+1)},{x,-5,5},Options[FillToCurve->{0,1}]]
Plot[{1/ArcSin[x],Log[1/x]},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[{ArcSin[Tan[x]],Cot[x]},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[Exp[Cos[t]]-2Cos[4t]+Sin[1/12t]^5,{x,0,203.14}]
Plot[{-1/x,1/(x+2)},{x,-10,10},Options[FillToCurve->{0,1}]]
Plot[{1/x,x},{x,0,10},Options[FillToCurve->{0,1}]]
Plot[1/x,{x,0,10}]
Plot[{1/x,Tan[x]},{x,-10,10},Options[FillToCurve->{0,1}]]
Plot[{Tan[x],Cot[x]},{x,-10,10},Options[FillToCurve->{0,1},PlotRange->{-0.5,0.5}]]
Plot[{Tan[x],Cot[x]},{x,-10,10},Options[ColorFunction[Cos[x]],PlotRange->{-0.5,0.5}]]
Plot[{Tan[x],Cot[x]},{x,-3,3},Options[FillToCurve->{0,1}]]
Plot[{-1/x,Cot[x+1/x]},{x,-30,30},Options[FillToCurve->{0,1}]]
Plot[{1/x,Tan[x]},{x,-5,0},Options[FillToCurve->{0,1}]]
Plot[{Tan[x],-1/x},{x,-1,5},Options[FillToCurve->{0,1}]]
Plot[{x,Sin[x]},{x,-3,3},Options[FillToCurve->{0,1},PlotRange->{-1,1}]]
Plot[{Tan[x],Cot[x]},{x,-3,3},Options[FillToCurve->{0,1},PlotRange->{-1,1}]]
Plot[{ArcSin[Tan[x]],x-2},{x,-5,6}]
Plot[{ArcSin[Tan[x]],Cot[x]},{x,-5,6}]
Plot[{ArcSin[x],Sin[x]},{x,-5,5}]
Plot[{ArcSin[x],Sin[x]},{x,-1,3},Options[FillToCurve->{0,1}]]
Plot[{Log[x],Sin[x]},{x,-1,3},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],Log[x]},{x,-5,6},Options[FillToCurve->{0,1},PlotRange->{-0.8,0.8}]]
Plot[{x,Log[x]},{x,-1,3},Options[FillToCurve->{0,1}]]
Plot[{ArcSin[Tan[x]],Sin[x]},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[{1/x,-1/x},{x,0,10},Options[FillToCurve->{0,1}]]
Plot[{1/x,Sin[x]},{x,0,10},Options[FillToCurve->{0,1}]]
Plot[{Cot[Log[x]],Tan[Log[x]]},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],Tan[Log[x]]},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[{ArcSin[Tan[x]],x},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[ArcSin[Tan[x]],{x,-5,6},Options[FillToAxes->{0}]]
Plot[{Cot[ArcSin[x]],Tan[ArcSin[x]]},{x,-5,6},Options[FillToCurve->{0,1}]]
Plot[{1/ArcSin[x],ArcSin[x]},{x,-5,6},Options[FillToCurve->{0,1},PlotRange->{-1,5}]]
Plot[{1/ArcSin[x],1/ArcCos[x]},{x,-5,6},Options[FillToCurve->{0,1},PlotRange->{-1,5}]]
Plot[ArcSin[Tan[x]],{x,-5,6},Options[FillToAxes->{0}]]
Plot[{Cot[2*ArcSin[x]],Tan[2*Log[x]]},{x,-5,6}]
Plot[{Cot[2*ArcSin[x]],Tan[2*ArcSin[x]]},{x,-5,6}]
Plot[{Tan[x],-1/x,x*x},{x,-4.5,4.5},Options[PlotRange->{-5,5}]]
Plot[{x*x,Sin[1/x]},{x,-5,5}]
Plot[Tan[x],{x,0,15},Options[FillToAxes->{0}]]
Plot[{Sin[x],x/(x*x+1/x+1)},{x,-20,20},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],x/(x*x+x+1)},{x,-5,5},Options[FillToCurve->{0,1}]]
Plot[{Sin[x],x*x*Sin[1/x]},{x,-0.5,0.5},Options[FillToCurve->{0,1}]]
Plot[{1},{x,0,10},Options[FillToCurve->{0,1}]]